www.gusucode.com > 地方成人教育中心整站源代码 1 > 地方成人教育中心整站源代码 1.0/About.asp
<!--#include file="inc/conn.asp"--> <!--#include file="inc/sqlin.asp"--> <% if request.QueryString("ID")="" then sql="Select top 1 * from Idea_About where IsShow="&GetState()&" order by Sequence" else if not IsNumeric(request.QueryString("ID")) then response.Write "<script>alert('参数错误!');history.go(-1);</script>" response.End() else sql="Select * from Idea_About where ID="&request.QueryString("ID")&"" end if end if set rs=idea.exec(sql,1) if not rs.eof then IndexTemplateHtml=Replace(FSOFileRead("template/"&idea_3&"/html/about.html"),"{template_head}",FSOFileRead("template/"&idea_3&"/html/head.html")) IndexTemplateHtml=Replace(IndexTemplateHtml,"{template_foot}",FSOFileRead("template/"&idea_3&"/html/foot.html")) IndexTemplateHtml=replace(IndexTemplateHtml,"images/","template/"&idea_3&"/images/") IndexTemplateHtml=Replace(IndexTemplateHtml,"{about_name}",rs("AboutName")) IndexTemplateHtml=Replace(IndexTemplateHtml,"{about_content}",rs("Content")) Title=rs("AboutName") else response.Write "<script>alert('数字不在接受范围!');history.go(-1);</script>" response.End() end if rs.close set rs=nothing IndexTemplateHtml= Replace(IndexTemplateHtml,"{idea_title}",Title) AllTemplateHtml=ReplaceGlobalLable(GetAllHtml(IndexTemplateHtml,Const_Rule)) response.write AllTemplateHtml %>